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Demonstration Language Three (DL.3) is intended for 
demonstration of the basic principles involved in high level 
languages, and therefore lacks the sophistications present in 
standard languagues. The emphasis is on simplicity. 

Source programs written in DL.3 consist of a set of 

statements constructed by the programmer from the language of 

elements described in this manual. 

* 

In a process called compilation, a program written in PL/1, 
and called the DL.3 compiler, analyzes the source program 

statements and translates them into a pseudo assembler language (a 
low level language) which can then be executed far more simply 

than the source program. In addition, when the compiler detects 

grammatical errors in the source program, it produces appropriate 
diagnostic error messages, and, where possible, corrects the error 
- for instance, if an invalid character is found, it is replaced 
with a blank. Appendices C and D contain information about the 
compilation and running of DL.3 programs. 


1.1 General. 


source programs consist of a set of statements which either: 

a) cause certain arithmetical operations to be performed (e.g. 
addition, subtraction, division.) 

or 

b) Specify or change the order in which the arithmetic 
Statements are carried out. 

or 

c) Cause data to be read into internal storage, or be printed 
out from it. 

These statements must be preceded by a PROGRAM statement, 
(defined later) which indicates the beginning of the program, and 
they must be followed by an END statement (also defined later) 
which indicates the end of the program. 

The set of characters that are allowed in the body of the 
program is: 

ABCDEPGHIJKLMNOPQRSTfJVWXTZ 1234567890 . , :=-.><)(*/ + - 

Characters in this set will be refered to from this point as 
’valid characters*. 



1,2 General format of individual statements. 


Page 4. 


The statements of a DL.3 program are input to the compiler on 
standard cards of 80 columns, or spaces for characters. The 
statements are punched one to a card using all the 80 columns if 
required, if a statement is too long to fit on one card, it may 
be continued on to the next by allowing part of the statement to 
overflow onto columns 73 - 80. These columns must contain blanks 
Only On the last card of a statement. 

&s many blanks as desired may be written in a statement to 
improve readability, as all blanks are ignored by the compiler. 

Comments to explain the program may be written in columns 2 
-> 80 of a card if a character that is not normally valid, such as 
the $ symbol, is punched in column 1. (Characters that are 
normally valid are given earlier.) comments are not processed by 
the compiler,but are printed on the listing of the source program. 
It is recommended that about one in five cards should be comments. 
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A constant is a fixed, unvarying, numerical quantity, and may 
be up to 10 characters long. Constants may be integers or real 
decimals, and the only characters allowed in them are: 

0123456789 or . 

Constants must contain at least one digit. 

Examples: 

some valid constants: 

0 

19 
173 

12.3456789 
43.5 

7. 

.3509 

.12 

1 . 

0.0 

Some invalid constants: 

256,967.45 
12E2 

* 

12345.67890 


(contains an illegal character) 
(contains an illegal character) 
(no digits) 

(too long) 
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A symbolic identifier consists of from 1 to 4 alphanumeric 
characters (i.e. a. -> z and 0 -> 9) , the first of which must be 
alphabetic. 

Symbolic identifiers may be used to uniquely identify; 

a) Storage locations. (The identifier is then known as a 

'variable name* — i.e. the name of a 
variable. [ see section 3.1 J) 

b) Statements. (The identifier is then known as a label.) 

Examples: 

Some valid variable names or labels. 


X 

A29 


RATE 


A76B 


Some invalid variable names or labels. 


DISTANCE (more than 4 characters) 

4BDS (first character not alphabetic) 

A,BC (contains a non-alphanumeric character) 


3.1 Variables. 

A variable is a symbolic representation of the contents of a 
storage location. The value specified by the identifier, or 
variable name, is the current value in the storage location that 

the identifier refers to. 

The use of meaningful variable names can serve as an aid in 
writing and changing a program. For instance, when calculating the 
mean of a set of numbers from the sum of the data items and the 

number of data items, the three variables used in the calculation 

might be named: X, Y, and Z. However, it would be more 

meaningful to someone reading the program if the programmer had 
used the names; MEAN, SUM, and NUM. 

Note that some combinations of letters may not be used for 

variable names. See Appendix E - Reserved Keywords. 
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when it is desired to execute the same section of program 
more than once, (when repeating a calculation on different sets of 
data, for example) rather than punching the same statements out 
several times, it is better to jump from the last statement back 
up to the first in the group. In order to achieve this, the 
target of the jump must be uniquely identified. This is done by 
prefixing the appropriate statement with a label (symbolic 
identifier) and a colon, e.q, 

LABL: statement 

More than one label may be prefixed if required, each 
followed by a colon: 

LABI: LAB2: LAB3: statement 
and so on. 


The statements to cause jumps are described in section 6 
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The simplest form of expression is just a variable name or 
constant. More complicated expressions may be built up using 
arithmetic operators. These are: 


+ (Addition) 

- (Subtraction) 

* (Multiplication) 

/ (Division) 

** (Exponentiation) 


Th&re are several basic rules for- constructing arithmetic 
expressions. These are: 

a) All desired computations must be specified directly. e.g. 
the variables named X and Y will not be multiplied if 

written: 

XY 

They would then be. taken as a variable named XY. Instead, the 
expression should be written: 


X * Y 


b) 

No 

e. 

two arithmetic operators may 

g. 

appear 

directly 

adjacent. 



X */ Y or X * - Y are invalid. 



c) 

Brackets (Parentheses) may be 

expressions. 

used, 

as in 

algebraic 

d) 

Computation is performed from left 
priorities: 

to right and in 

the usual 


i) 

Brackets 

t )( 

] 



2) 

Exponentiation 

[ ** 

] 



3) 

Multiplication & Division 

[ * S 

/ 3 



4) 

Addition £ Subtraction 

[ + 6 

- 3 
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For example, in the expression: 

A * B + C * D ** B 


-the operations are performed in the following order; 


1) 

A 

* 3 

[leaves X+C*D**E, where X is the 
the multiplication of A and B.] 

result of 

2) 

D 

** E 

[leaves x + c * Y. ] 


3) 

C 

* y 

[leaves X + Z.3 


4) 

X 

+ z 

[final operation.] 



AS 

* 

m 

algebraic expressions, if there are 

consecutive 


exponentiation operators, that part of the expression is evaluated 
from right to left. e.g. 

A. ** B ** C is evaluated as A ** {0**0) 

A parenthesized expression is evaluated before it is US6d| 
and is then treated as a single unit, (as if it were a .variable or 
constant) 


Example; A fairly complex expression. The order of 
evaluation is shown underneath. 

(A * B / ((C - D) * E )) ** (P / 8.3) - 7 


1 


4 


2 


3 


7 
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General Form: ID = EX 

Where: ID is a variable name. 

EX is an expression, as described in the last section* 

The equals sign here specifies replacement rather than 
equivalence. i.e. the expression on the right of the equals sign 
is evaluated, and the result is placed in the storage location 
named on the left of the equals sign, erasing whatever was 
previously in that storage location. 

The statement may have one or more labels on it, if desired. 

Examples: 

A = B (The value of h is replaced by the current value of B) 

C = C + 1 (Increases the contents of the storage location named C 

by one) 

D = <£ - F)/ G (The expression is evaluated, and the result placed 

in D) 

LABL: H = I ** J * K (Note label) 

In addition to the general form of the assignment statement 
given above, it is also permissible to specify several variables 
which will be assigned the value of the expression evaluated. 
Thus: 

A=B=C=D+E**F 
is permissible and correct. 

Note that: 

A=B = C = D + E= F**G 

is meaningless and incorrect, (an expression cannot be 

assigned a value) 
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In section 3.2 the use of labels to enable jumps to be made 
in the program was mentioned. This section describes the 
statements to cause this jumping, and also other control 
Statements. 


6.1 The GOTO statement. 


The general form of the GOTO statement is: 

GOTO 1111 

(Where 1111 is a label.) This will cause control to be passed to 
the statement with the specified label, and therefore the next 
statement to be executed will be the statement with that label. 

As this is an unconditional transfer of control, the 
statement following it in the source program should have a label, 
otherwise it can never be refered to Or executed. (This is not 
necessary if the goto statement is the last statement in the 
program before the END statement.) 

Example: 


GOTO LABI 

LAB2; h - B + C 


LABI: A * 1 


in this example, each time the GOTO statement is executed, 
control is passed to the statement: A = 1 . 
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This statement eriaoles che programmer to branch when a 

condition is satisfied, for instance, it is possible to control 

the number of times a certain group of statements is execeuted. 

The general form of the statement in this application is: 

IF logical expression THEN goto 1111 
1111 is a label as before. 


The logical expression describes the condition that has to be 
satisfied for the branch to be performed. In consists of two 
expressions, as defined in section 4, which are compared according 

hat separates them. These logical 


> 

>= 

< 

<= 


logical operator 
s are: 

(is 

equal to) 

(is 

not equal to) 

(is 

greater than) 

(is 

greater than 

(is 

less than) 

(is 

less than or 


For example: 

*. * 


IF A < 10 THEN GO TO LAHi 


means: ' if A is less than 10 then qo to LABI 

A more complex conditional branch might be: 


IF B * A -»= 24.3 ** (N - 5) THEN GO To LAB 2 


and so on. 

Notes : 

Any expressions used on either side of the logical operator 
must be valid expressions as defined in section 4. 


The keyword THEN rrav nor. be omitted. 


There must be a logical operator. 
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General form: 

STOP 

This statement will stop execution of the program at this 
point. The statement may have a label, any also may be put after 
the THEN in an IF statement. 

Examples: 

IF X < 0 THEN STOP 
STOP 

IF Y = 23.8 THEN LABL: STOP 

In the case of the last example, the statement 
GO TO LABL 

would stop execution of the program, (whether Y equaled 23.8 or 
not.) 


The next two control statements have been briefly mentioned 
before (in section 1.1), and are not executable, i.e. they may not 
occur in the body of a program, nor may they occur after the THEN 
in an IF statement. (A statement such as IF A > B THEN END is 
not allowed, for instance.) 


6.4 The PROGRAM statement. 


General form: 
program name 

where name is up to twelve characters chosen from the valid set 
which serve to identify the program. 

A name might therefore be: 

J.SMITH,PGM5 

This statement may not have a label, and indicates the start 
of the program, and must therefore precede all other statements. 
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General form: 
END 


This statement marks the end of the program, and must 
therefore be the last card of the program, and must not occur 
anywhere else. 

It may not have a label. 

If this statement should be reached during execution, 
execution is terminated. 
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The IF statement has already been partly described before 
(Section 6.2 - Conditional branching) and the purpose of this 
section is to complete the description. 

The full form of the statement is: 

label(s) IF logical expression THEN executable statement. 

* label(s) 1 are optional. 

’logical expression* remains as described in section 6.2 (q.v.). 

’executable statement’ is any statement that may be executed, i.e. 
carries out some function at run time. It may have label (s) 
if required, and may be a further IF statement. 

Examples: 

IF A = 8 THEN C = D + 1 

IF A < B THEN IF A. -»= 0 THEN C = B / A 
LABI: IF A >= 10 THEN LAB2: LAB3: A = 0 

The only statements not executable are: 

The PROGRAM statement. 

The END statement. 

The PARM statement. 

The SET statement. 

Comments. 


(PARM and SET statements 


are described in later sections.) 
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The input/output sta.tem.ents are used to transfer data between 
internal storage and an input/output device, usually a card reader 

for input and a printer for output. 

Data to be input from cards is punched, one data item per 
card, in columns 1 -> 10. All other columns (11 -> 80) will be 

ignored during execution of the program. If a number does not 
include a decimal point, that is, if it is an integer, its last 
digit must be in column 10. Minus and plus signs are allowed, but 
there must not be a blank between them and the first digit of the 
data item. Blanks between digits are not allowed. 

Examples of valid data items: (the vertical lines indicate 
the limits of columns 1 -> 10. 

I 12.5 | 

12.4567890 


I I 

|73.7 | 

24 

1 I 

I -256j 

I I 

1 -23.1 1 

I I 

j +70.8 1 

I I 

1 .354 1 

A completely blank data position will be treated as zero. 

When data is output to the printer, it is printed, one item 
per line in the form (for example): 

NAME = -123.758 

where NAME is the name of the storage location whose contents are 
printed alongside. 


Blank lines may be left to improve readability. 
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General form: 

READ id,id,id . 

The statement may have a label or labels. 

* id' is the name of a variable. 

This statement will cause one data card to be read for each 
variable name in the list following the keyword read, and will 
replace the contents of the storage location named with the number 
on the corresponding data card. 

For instance, if the statement 

READ A,B,C,D 

was met, and the data cards were punched as shown in the previous 
example (without the blank cards) then A would have the value 
12.5, B would have the value 12.456789, C would have the value 
7.0, and D would have the- value 73.7 . 


Note that the variable names must be separated by commas. 
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The WRITE statement is the sole means of communication from 
the program to the programmer, and will occur in almost every 

program. 

The general form is: 

WRITE expression,expression,expression ..... 

The statement may have a label or labels. 

'expression* is the standard expression as described in 

section 4. 

Rules deciding the form of the line printed: 

If ’expression' consists of a single variable name, say X, 
the line printed for that part of the WRITE statement might be: 

x = o.ooo 

If ’expression' consists of just a constant, say 23.8, the 
line printed for that part of the WRITE statement might be: 

3003 = 23.800 

(3003 is a compiler generated name for a storage location which 
holds the constant, 23.8). 

If 'expression' contains arithmetic operators (such as +, -, 

or *) then the line printed might be: 

££££ = 0.000 

where 0.000 is the result of the evaluation of the expression, and 
££££ is a name generated by the compiler to hold temporary results 
of this kind. The compiler will always use this name in this 
application.) 

It is also permissible for no expression to be put between 

the two commas. In this case a blank line is inserted in the 

output. 

Examples of valid WRITE statements: 

WRITE A,B,,D 

WRITE ,B,, (three blank lines inserted) 

LABL: WRITE A,B,12.6,,D 
WRITE (A + B) / C , A, B, C , 


WRITE 


((A + B) / (N ** F>) / 3.5,,Z 




9 su j >proqrams . 
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It is often found that a program requires the same 

computation, for instance calculation of logarithms, to be 
performed at several different, points. It would simplify and 
shorten the writing of tnat program if the statements required to 
perform the desired calculation could be written once only, and 
then accessed freely, with each subsequent reference to that group 

of statements having the sarnt effect as though the statements were 

inserted at the point of reference. 

A block of statements that may be referenced in this way is 

of the form: 


Labeled statement 


other statements 


RETURN s tat ement.: 

9.1 The RETURN statt merit. 

General form: 

RETURN 


This statement causes control to be returned to the point 
where the group of statements (subprogram) was referenced. (See 
the next section to see how it is referenced.) 

The statement may have a label or labels if required, and as 
it is an executable statement it may occur after the THEN in an IF 
statement. 
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General form: 

CALL 1111 

where 1111 is a label. 

This statement causes control to be passed to the statement 
with the label given, in such a way that when a RETURN statement 
is met, control will be returned to the statement following the 
CALL statement. 

Notes: 


A subprogram may call itself or another subprogram. 

Up to 32 CALL statements may be executed and be awaiting a RETURN 

statement at any one time. These CALL statements are not 

necessarily different. 

If more than one CALL statement is awaiting a RETURN statement, 
(or the same CALL statement has been invoked more than once 
without intervening returns) and a RETURN statement is 
executed, control will be passed to the statement following 
the last CALL statement that was executed. 

A STOP statement (Section 6.3) will have the same effect as a 
RETURN statement, if it is executed while a CALL statement is 
awaiting a RETURN statement. 

It is permissible to branch out of a subprogram using a GO TO 
statement (Section 6.1) but it must be remembered that a CALL 
statement will still be expecting a RETURN statement, and 
therefore if a STOP or RETURN statement is met, control will 
be passed to the statement following that CALL statement. If 
the programmer should wish to stop execution, and one or more 
CALL statements are awaiting a RETURN statement, he should 
place a statement (other than a CALL or GO TO statement) 
before the END statement, and then branch to that. When the 
attempt to execute the. END statement is made, execution will 
be terminated. 

It is also permissible to branch to the label on a subprogram 
without using the CALL statement, (i.e. by using the GO TO 
statement.) In this case, it must be remembered that if no 
CALL is awaiting a RETURN statement, then a RETURN statement 
will have the same effect as a STOP statement. 
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There are two statements in the language that have not been 
described. Neither of them is executable, and therefore: 

a) They may not have a label. 

b) They may not occur after the THEN in an IF statement. 

c) It is suggested that their position is restricted to being 

before all executable statements, that is, immediately 

following the PROGRAM statement. 


10.1 ' The SET statement. 


The SET statement is used to initialize variables to a value 
before a program is executed. The statement is not executable, and 
therefore can not be used to change the values of variables during 
execution. 

The statement consists of SET followed by a list of alternate 
variable names and constants, with the names and constants 
separated from each other by commas. Each variable is initially 
set to the value of the constant following it. For instance: 

SET A t 12,0,13.6,C,D,1254.8,E,-123,F 


Note: 

a) If no constant is found where expected, the variable named 
will be initialized to zero. (e.g. in the example given 
above, C and F would be initialized to zero.) 

b) Minus signs are allowed on the constants in this application, 
(e.g. E in the example above). 
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The PARM statement is used to pass information: 

a) To the compileri and 

b) To the control program supervising the execution of the 

program. 

The passing of information to the compiler is dependent on 
the compiler used. The appropriate description for the DL.3A 
compiler will be found in Appendix c, with examples of compiler 
output in Appendix D. This section therefore deals just with the 
passing of information, or parameters, to the execution 
supervisor. 

The form of the statement is PARM followed by one or more of 

the parameters separated by commas. These parameters are: 

* 

OUTPUT = n 

where n is an integer constant. This item means that the maximum 
number of. lines of results allowed will be set to n. When the 

program attempts to print the (n + 1) th line, it will be 

automatically terminated. Default value for n if this item is not 
specified in a PARM statement is 100. The purpose of this 
restriction is to allow for mistakes such as a program going into 
an endless loop, and printing out a line each time round the loop. 
The maximum value for n is 1000. 

EXEC = n 

where n is again an integer constant. This specifies the maximum 
number of low level language statements that will be executed 
before execution is automatically terminated. This restriction 
also is to prevent a program accidentally looping for ever. 
Default value for n is 1000, maximum value is 10000. 

NEWPAGE 

This item merely specifies that, results will be printed starting 

on a new page. 

A PARM statement might be: 

PARM EXEC = 4500, OUTPUT = 200, NEWPAGE 

Note that the order of the items is not important. The language 
allows for any compiler control items to be mixed in at will. 

(but each one still separated by commas.) 
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Explanation of the symbols used below: 

<name> indicates that ’name’ is a word either defined in this 

statement, or elsewhere. 

::= means *is defined as*. 

j means 'or*. 

[ 3 indicates that the contents of these brackets are optional. 


<alpha> ::= A ] 

B | 

C I 

D 1 
E | 

F I 
G ! 

H i 

1 I 

J I 

K ! 

L 1 

M | 

N | 

° I 

p ! 

Q 1 
R 1 
s I 

T | 

U | 

V | 

W I 

X I 

y i 

z 

<digit> ::= 1 | 

2 I 

3 

4 

5 ) 

6 I 

7 i 

8 I 

9 I 

0 

<integer> ;:= <digit> | 

<digit><integer> 

<integer> | 

t<integer>] . <int.eger> | 
<integer>.[<integer>3 


<constant> 
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<op> 

<id> 

<expression> 

<label> 

<logical op> 

<logical expr> 
<valid char> 


<text> 

<assignraent stm> 

Cread stm> 

<write stm> 

<if stm> 


: := + } 

- I 

* 1 

/ 1 

* * 

::= <alpha> | 

<id><alpha> | 

<idxdigit> 

::= <id> | 

<constant> | 

(<expressions | 

<expression><op><expression> 

: := <alpha> | 

<label><alpha> | 
<labelXdigit> 


< I 
<= I 
> I 
>= l 


::= <expression><logieal op><expression> 

::= <alpha> | 

<digit> I 

- 1 
+ I 
/ I 

* I 
, 1 


> 

< 


< I 

) 

::= <valid char> | 

<valid char><text> 

::= <id> = <expression> | 

<id> = Assignment stin> 

t: = READ <id> | 

<read stni>,<id> 

::= WRITE [<expression>] j 

<wr±te stm>,[<expression>3 

::= IF <logical expr> THEN <executable stm> 
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<goto stm> 

<StOp S t[Tl> 

<call stm> 
<return stm> 

<executable stm> 


<set constant> 

<parm memfoer> 


<parnt stm> 

<set 3tm> 

< coinmen t> 
<statement> 

<program stm> 
<end stm> 

<source text> 


= GOTO <label> 

STOP [<text>] 

::= CALL <label> 

::= RETURN [<text>] 

::= <assignmervt stm> j 
<read st.ni> | 

<write sttn> | 

<if stm> j 

<goto stm> | 

<stop stm> j 
<call stin> 1 

<return stra> | 

<label>:<executable stm> 

t + 3 <constant> | 

-<constant> 

::= NOMSG [<text>] | 

NOMESSAGE [<text>] j 
[NO]CODE [<text>] | 

NOXRE'F [<text>] | 

NOCROSS [<text>] | 

NOSEV [<text>] | 

SEV [<text>] = <integer> j 
XREF [<text>] - <integer> | 

CROSS [<text>] = <integer> | 
EXEC = <integer> | 

OUTPUT = <integer> | 

WEWPAGE 

::= PA.RM <parm meraber> | 

<parm st.m>,<parni jnember> 

::= SET <id>[,<set constant>] | 

<set stm>,<id>[,<set constant>] 

::= $ [<text>] 

<executabls stm> | 

<parm stm> | 

<set stm> | 

<comment> 

::= PROGRAM <text> 

;:= END [<text>] 

:;= <statement> | 

<statsrnsnt><source text> 


<program> 


<prograEti strri>[<source text>]<end stm> 



Page 26. 

The three uagen given above are not Sufficient .in theiTl3£lV6S 
tO define the language entirely. The following completes the 
definition and also gives some general notes. 

Maximum lengths: 

<ict>,<Label> - 4 characters. 

<eonstant>,<set constant> - 10 characters. 


<statement>,<end stat^ment>»<program statement> - 256 characters. 


Everything else is is 

tnese length restrictions. 


defined in terms of. 


or is dependent on 


The $ symbol for a comment must be in column 1. Note also 
that other symbols may be used for this, (see Section 1.2) 

The first twelve characters of <t e-xt> in a program statement 
are used to identify the program, (see Section 6.4) If there are 
less than twelve, all are used. 

<t.ext>, where used in the definition of <parm member>/ may 
not include either of the symbols , or =. 


Continuations are effected by putting part of the statement 
to be continued in columns 71 -> 80 of the input card, (see 
Section 1.2) 


Labels must be unique, that is, they may only occur on one 
executable statement in any one program. 

Any label referenced by a GO TO or CALL statement must be set 
on an executable statement of the program. 

Note that the parameters ror the UL.3A compiler are given in 
the definition of <parm member>. It must be remembered that these 
are not strictly a part of the language, and that they need not 
necessarily be catered for in any other compiler. 
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Appendix B. Sample programs. 


This appendix consists of two programs which demonstrate all 
statements mentioned in this manual. The first example is a 
simple linear program for calculating a persons age from the 
present date and the persons birth date. This first example also 

shows the normal position for data for a program. 

PROGRAM AGE 

$ FIRST WE READ IN PRESENT MONTH AND PRESENT DATE: 

READ NOWM,NOWY 

$ WE NOW READ IN BIRTH MONTH AND BIRTH YEAR. NOTE THAT 
$ THIS GOULD HAVE BEEN DONE IN THE SAME READ STATEMENT AS 
$ THE PRESENT DATE: 

READ BMON,BYER 

$ WE NOW CONVERT BOTH DATES TO MONTHS. 

NOW = 12 * NOWY + NOWM 

BD = 12 * BYEk 4 BMON 

$ SUBTRACT: 

AGE = BD - NOW 

$ PRINT OUT AGE IN MONTHS: 

WRITE AGE 

STOP 

END 

6 . 

71. 

8 . 

53. 

%% 


Note the %% card. This card must be present to indicate the 
end of the Program and Data. The first two columns of the card 
must contain %%, and columns 3 and 4 must be blank. 

Note also that blank cards are permitted. A compiler will 
treat them as comment cards. 

The result printed out from the program and data given above 
would be: 


AGE = 214.000 

The next example program illustrates loops: one to enable 
several sets of birth dates to be read in, the other to convert 
the months to years and months. 



PROGRAM AGE2 
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$ THIS PROGRAM READS IN A SERIES OF PAIRS OF CARDS, THE FIRST 
$ CARD IN EACH PAIR BEING THE MONTH OF A BIRTH DATE, AND THE 
$ SECOND BEING THE YEAR. IN ADDITION, THE FIRST TWO CARDS 
$ GIVE THE PRESENT DATE, AND THE LAST CARD OF THE DATA HAS THE 
$ VALUE ZERO IN ORDER TO INFORM THE PROGRAM THAT ITS TASK IS 
$ COMPLETED. 


$ THE NON-EXECUTABLE STATEMENTS FOR THE PROGRAM: 


PARM £XEC=10000, OTJTPUT= 1000, NEWPAGE 
SET NUM, 0 

$ FIRST READ IN PRESENT DATE AND WORK OUT PRESENT DATE IN MONTHS 


READ NOWM,NOWY 

NOW = 12 * NOW* + NOWM 

$ NEXT READ IN A MONTH CARD: 

TOP: READ MON 

$ TEST TO SEE IF IT EQUALS ZERO. IF IT IS, THEN STOP. 

IF MON=0 THEN STOP 
$ INCREASE COUNT: 

NUM = NUM + 1 
$ READ IN YEAR CARD: 

READ YEAR 

$ WORK OUT AGE IN MONTHS: 

AGE = NOW - (12 * YEAR + MON) 

$ NOW CALL SUBROUTINE 'AGE* TO CONVERT THIS FIGURE TO YEARS AND 
$ MONTHS. RESULT WILL BE OF THE FORM: 16.090, WHERE 16 IS 
$ YEARS, AND 09 IS MONTHS. 

CALL AGE 

$ PRINT OUT RESULT WITH ITS IDENTIFYING NUMBER, AND THEN RETURN 
$ TO THE TOP OF THE LOOP TO READ IN THE NEXT SET OF DATA: 

WRITE NUM,AGE, 

GOTO TOP 
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$ SUBROUTINE AGE: 

AGE: YERS=0 

$ CHECK TO SEE IF CONVERSION COMPLETED: 

AG'ElsIF AGE <= 11 THEN GOTO AFIN 

$ IF NOT, DECREASE INPUT BY TWELVE MONTHS, AND INCREASE YEARS 
$ ( * YERS* ) BY ONE. 

AGE = AGE - 12 
YERS = YERS + 1 

$ GO TO SEE IF CONVERSION COMPLETED YET: 

GOTO AGE1 

$ THIS POINT REACHED WHEN CONVERSION COMPLETED: 

AFIN:AGE = (AGE / 100) + YERS 

$ ’AGE* NOW CONTAINS DESIRED RESULT, SO WE RETURN. 

RETURN 
END AGE2 

This program illustrates several points: 

The PARM statement. 

Loops. 

A common technique for terminating a program after a variable 
amount of input data, (having a data item that would not normally 
occur in the data.) 

A subprogram call. 

A subprogram. (Which must be there, of course, if it is 

called.) 

The importance and use of comments. 

The IF statement. 


The SET statement. 



Page 30. 


Appendix C 


Compiler options in tne PARM statement 

. . .— A. I. ,c«> . I — .1 . I . . ■ ■ ■ I I, ■ . • I .. 


for tne UL.3 * ,V Compiler. 


In the description of the PARM statement, the facility that 
allows compiler control parameters to be mixed in with the 
execution control parameters was mentioned. This section descibes 
the compiler control parameters as implemented in the DL.3 'A* 
compiler. Before the parameters are given, a brief description of 
the default output produced by the compiler follows: 


1) A listing of the source program, with each statement, other 
than comments, numbered. If there are any grammatical errors 
in the program these will be detected by the compiler and the 
number and type, of the error j a given below the erroneous 
statement. 


2) If any errors were detected, a list of the appropriate error 
messages is printed next, with the statement numbers of the 
erroneous statements given beside the message. 



Thirdly, a ’labels cross-reference list' 
were any labels in the program. This is 
used in the program, together with 

statement that each label was set on, and 
statements that reference them. 


is given if there 
a list of the labels 
the number of the 
the numbers of the 


4 ) 


A 'variables cross-reference list', which lists the variable 
names used in the program, together with: 


) 


If they occur in a SET statement, the statement number 

of the S 'j'i statement. 


b) 


Also only if they occur in a SET statement, 
they are set to in that statement. 


the value 


c) 


A 


list of the numbers of the statements that reference 
them. If the variable is referenced twice in a 
statement, the number of that statement will occur twice 
in the cross-reference list. If the value of a variable 
is changed in a statement, then that statement number 
will be preceded by an asterisk. To illustrate these 
last two points, if, say, statement 12 in a program is: 
I = I + 1, then the list of references to I would 
include the following: 12,*12 (The asterisked number 
comes second, as the assignment part of the statement is 
carried out. after tne evaluation of I + 1. ) 


5) Lastly is printed out the output from the execution routine 
(if there are no severe errors in the program). This 

consists of the listing of the low level language statements 

produced by the compiler, which includes the numbers of these 

statements and the numbers of the DL.3 statements that 

produced them, and, finally, the results of the execution of 
the program. 
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WG HOW COniA to the compiler control items in the PARM 
statement. These are given below in the same order as they are 
listed in Appendix A: 


NOMSG [<tGxt>] 

This informs the compiler that tne programmer does not 

wish the full listing of the error messages printed. 

l<text>l means, in this case and the ones that follow, that 
the programmer may add 5 comment in this position. This 
comment may not include either of the symbols , or = . Note 
that, the error flags in the source listing will still be 
printed. as these have not been fully explained before, 
these are now described: 


The error flags are of the form: 

** WO2 ** 

the severity of the 
has a Severity code 
and the severity codes 


where the first letter describes 
error. Each type of error 
associated with it. These types, 
associated with them, are: 


w - warning. 


Severity Code - 4 


■ 


Error. 


Severity Code = 8 


S - Severe Error. Severity Code = 12 

T - Terminal Error.severity code = 16 


The meaning of -ach type of error is: 


W - 7\n error has been detected and corrected by 

the compiler. The program will probably run 

successfully. 


A more serious error has been detected. The 
compiler has made a correction, but the 
program is less likely to run successfully. 

s - A severe error has been found. The compiler 

has made an attempt at correction in order to 
produce valid code, but the program will 
probably not run successfully. Normally the 
program would not be run if an error of this 
severity occured, although it is possible to 
overide this restriction. (See later in this 
Appendix.) 

T - An extremely severe error that the compiler 

cannot correct meaningfully has occured. No 
code will be produced for the rest of this 
statement, but further statements in the 
program will be compiled. 

The digits serve to identify the error message. 
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NOMESSAGE [<text>3 

This is an alternative way of writing NOMSG, and has the 
same effect. An example of how this might be incorporated in 

a FARM statement: 

PARM NO MESSAGE LISTING, EXEC=2000 
CODE [<text>] 

This item will cause the generated code to be listed 
after the source statements that cause the code to be 
produced. This code will be printed down the right hand side 
of the print-out. 

NOCODE [<text>] 

This will stop the printing of the generated code. 

NOXREF [<text>] 

This will stop the creation and printing of the Cross- 
Reference lists. 

NOCROSS [<text>3 

This has an identical effect to NOXREF. A PARM statement 
using it might, be: 

* 

PARM OUTPUT = 200, NO CROSS - REFERENCE LISTS, NEWPAGE 
NOSEV t<text>] 

This causes the program to be run whatever severity 
errors have occured in the program. 

SEV I<text>] = <integer> 

This item defines whether the program is to be run. For 
instance, if <integer> is 8, then if an error of severity 8 
or higher is found in the program, then the program will not 
be run. 

XREF l<text>3 = <integer> 

This defines the level of cross-reference listing that 
is required. <i.nteger> is either 0, 1, or 2: 

0 - (Equivalent to 'NOXREF') No cross-reference lists 

are created or printed. Note that if this (or 
NOXREF) is specified, labels are not checked to see 
whether they occur twice et cetera. 

1 - Default value. All labels and variables used by the 

programmer are listed. 

2 - In addition to the labels and variables used by the 

programmer, all variables and labels generated and 
used by the compiler are listed. 



CROSS t<text>] 


<intsger> 
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Identical in meaning and effect to 
<integer>. 


Notes. The alternative forms are provided to 

typing if desired, e.g.: 

PARM NOXREF, 3EV=16, NOMSG 

is equivalent to: 

FARM NO CROSS REFERENCE LISTS, SEVERITY CODE 
MESSAGES LISTING REQUIRED. 


XREF [<text>] = 


save excessive 


LIMIT =16, NO 


The latter, of course, is the more desirable. 

Results are usually unpredictable if any item other than 
CODE/NOCODE is specified twice in the same program. 



Appendix D. The DL.3 *R* Compiler: Sample output. 
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This appendix gives an example of the output produced by the 
DL.3 ’A* (Checker) Compiler. 

The program used in the illustration is a short one which 
finds the Mean, the Maximum, and the Minimum of a set of numbers. 
An error has delibrately been introduced in order to demonstate 
the error message procedure. 

The format of some of the output has been changed slightly to 
make it fit on the pages in this manual. 

A horizontal line thus: 

n n *■ «i it ft v« ft •» «i v« «> 9 i ii ti J» «« if ft n ti 11 tt ft tf 11 n ti « n ft ii n it it « f« «* n «v *« «v tr »f t> tv v» tv vt ti «f if i« ti fi «v ti *r it n n t« n «« n «t 


indicates a new page of output. This would not normally be 
printed. 


The example starts on the next page. 



PdCJG: 3 5 


********* DL.l CHECKER COMPILER. VERSION 1.2 JUNE 1971. *********** 


1 

2 


4 

5 


6 

7 

0 

9 

10 

11 

12 

13 


14 

15 


** WO2 


*. * 


PROGRAM MEAN/MIN/MAX 
PARH NEWPAGE, SEVERITY LIMIT = 8 
SET MEAN,MAX,I,MIN,100 000 
$ N IS NUMBER OF DATA ITEMS: 
READ N 
WRITE N 


$ WE NOW START THE 
{■ 

$ NOTE Til AT ONE OF 


$ NOTE ONE MUST BE 
<•* 


TOP: 1=1+1 


LOOP READING IN DATA ITEMS E.T.C. 

THE DATA ITEMS X MUST BE >= 0. 

<= 100 000 


IF 1>N THEN GO TO PUT 


READ X 
WRITE X 

IF X<M.IN THEN MIN=X ' 

IF X>MAX THEN MAX=X 
MEAN = (((1-1)*MEAN)+X)/1 
GOTO TOP 

$ 

$ 

PARM CODE 

PUT: WRITE ,,MEANN,MIN,MAX 

PUT WRT 
WRT 


16 

STOP 

17 

END 


WRT MEAN 
WRT MIN 
W RT MAX 

TRA 

END 


if fi H ti tt <1 »» ?t it ii ii rt n ii ti ti it if n »i »i »i ii v n ft n » i it n ?i i* n it h yi i< it it it i» ii ii h i» t» it n n it ti n if if « if i» ti if if n u it 11 ?! if 





ERROR 


IN THIS COMPILATION. 


* x * 


STATEMENT 


15 WO2 NAME EXCEEDS FOUR CHARACTERS. TRUNCATED 


HIGHEST SEVERITY CODE IS 4 


ii n 


t» n ii <i it n ti n it it i* it ii ii ii ti it ti f» tt it it it tt tt ii ii it it if yi ii it if ii u it ti n ii « n ft if yt rt n ii tt n n ii n n t? »i r» 
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*** LABELS CROSS-REFERENCE LIST *** 

LINE NAME REFERENCES 


15 PUT 7 

6 TOP 13 


ti li fl ll H it fi if tt II ft I* it ti ft ii «it t* n ti i) ti n « it n it n n ti it n n it tt i» » w tt « n ti it it n it ti tt it tt tt tt n ti « ti « ti tt «t n n « « »* 


*** VARIABLES CROSS-REFERENCE LIST *** 


SET 

NAME 

INIT.VALUE 

REFERENCES 

3 

I 

0 

6,*6,7,12,12 

3 

MAX 

0 

11,*11,15 

3 

MEAN 

0 

12, *12,15 

3 

MIN 

lOOOOO 

10,*10,15 


N 


*4,5,7 


X 


*8,9,10,10,11,11,12 


vi n n tv tt tt tt tt it ti tt n » ft tt it ti ft «t tt mi it ft nit tt tt tt tt tt tv it tt tt ttn n n tt it it vi tv tv n tr n it n n ti tt n it tt ti it tt tv tt ti it tt it it 
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PROGRAM MEAN/MIN/MAX 



SET 

S Z ER 

0 

DL. 3 

STM. 

# 

— 

l 







SET 

6 MNO 

-1.000 

DL. 3 

STM. 

ft 

— 

i 






PAR 

NEWP 



DL. 3 

STM. 

# 

— 

2 







SET 

MEAN 

0 

DL. 3 

STM. 

if 

— 

3 







SET 

MAX 

0 

DL. 3 

STM. 

n 

— 

3 







SET 

I 

0 

DL. 3 

STM. 

u 

— 

3 







SET 

MI i'l 

100000 

DL. 3 

STM. 

tt 

— 

3 







RDo 

N 


DL. 3 

STM. 

# 

— 

4 

-DL. 2 

STM. 

tt 

— 

1 


WRT 

N 


DL. 3 

STM. 



5 

-DL. 2 

STM. 

tt 

— 

2 


WRT 



DL. 3 

STM. 

tt 

i t 

— 

5 

DL. 2 

STM. 

ti 

— 

3 


SET 

a ooi 

1 

DL. 3 

STM. 

tt 

rr 

6 






TOP 

CLA 

aooi 


DL. 3 

STM. 

tf 

— 

6 

DL. 2 

STM. 

tt 

— 

u 


ADD 

i 


DL. 3 

STM. 

tt 

— 

6 

DL. 2 

STM. 

tt 

— 

5 


STO 

I 


DL. 3 

STM. 

ti 


6 

DL. 2 

STM. 

tt 


6 


SUB 

N 


DL. 3 

STM. 

tt 

— 

7 

-DL. 2 

STM. 

# 

— 

7 


TIM 

6 0 01 


DL. 3 

STM. 

tf 

= 

7 

DL, 2 

STM. 

# 

— 

8 


TIZ 

6001 


DL. 3 

STM. 

ft 


7 

DL. 2 

STM. 

tt 

— 

9 


TRA 

PUT 


DL. 3 

STM. 

tt 

— 

7 

DL. 2 

STM. 

tt 


10 

6001 

RD3 

X 


DL. 3 

STM. 

# 

— 

8 

-DL. 2 

STM. 

tt 

— 

11 


WRT 

• *r 

X 


DL. 3 

STM. 

tt 

— 

o 

-DL. 2 

STM. 

tt 

— 

12 


CLA 

X 


DL. 3 

STM. 

ft 

— 

10 

-DL. 2 

STM. 

ti 

— 

13 


SUB 

MIN 


DL. 3 

STM. 

Ii 

— 

10 

DL. 2 

STM. 

# 

— 

14 


TIZ 

6002 


DL. 3 

STM. 

tt 

— 

10 

DL. 2 

STM. 

tt 

— 

15 


MUL 

6 MNO 


DL. 3 

. 

it 

— 

10 

DL. 2 

STM. 

ti 

— 

16 


TIM 

6002 


DL. 3 

STM. 

tt 

— 

10 

DL. 2 

STM. 

tt 

— 

17 


CLA 

X 


DL. 3 

STM. 

tt 

• e 

— 

10 

DL. 2 

STM. 

tt 

— 

18 


STO 

MIN 


DL. 3 

STM. 

tt 

— 

10 

DL. 2 

STM. 

ti 

— 

19 

600 2 

CLA 

X 


DL. 3 

STM. 

tt 

— 

11 

- .DL. 2 

STM. 

tt 

— 

20 


SUB 

MAX 


DL. 3 

STM . 

u 

— 

11 

DL. 2 

STM. 

ti 

— 

21 


TIM 

6003 


DL. 3 

STM. 

u 

— 

11 

DL. 2 

STM. 

tt 

— 

22 


TIZ 

6003 


PL. 3 

STM. 

n 

— 

11 

DL. 2 

STM. 

# 

— 

23 


CLA 

X 


DL. 3 

STM. 

$ 

— 

11 

DL. 2 

STM. 

tt 

— 

24 


STO 

MAX 


DL. 3 

STM. 

tt 

— 

11 

DL. 2 

STM. 

ti 

— 

25 

£003 

C LA 

i 


DL. 3 

STM. 

n 

— 

12 

-DL.2 

STM. 

tt 

— 

26 


SUB 

a o o l 


DL. 3 

STM. 

tt 

— 

12 

DL. 2 

STM. 

# 

— 

27 


MUL 

MEAN 


DL. 3 

STM. 

tt 


12 

DL.2 

STM. 

tt 

— 

28 


ADD 

X 


DL. 3 

STM. 


— 

12 

DL. 2 

STM. 

tt 

— 

29 


DIV 

I 


DL. 3 

STM. 

tt 

— 

12 

DL. 2 

STM. 

ti 


30 


STO 

MEAN 


DL. 3 

STM. 

tt 

= 

12 

DL. 2 

STM. 

ti 


31 


TRA 

TOP 


DL. 3 

STM. 

tt 

— 

13 

-DL.2 

STM. 

tt 

— 

32 

PUT 

WRT 



DL. 3 

STM. 

tt 

— 

1 5 

-DL. 2 

STM. 

tt 

— 

33 


WRT 



DL. 3 

STM. 

« 

— 

15 

DL.2 

STM. 

tt 

— 

34 


WRT 

M if, AN 


DL. 3 

STM. 

tt 

— 

15 

DL. 2 

STM. 

tt 

— 

35 


WRT 

MI N 


DL. 3 

STM. 

tt 

— 

15 

DL. 2 

STM. 

tt 

— 

36 


WRT 

MAX 


DL. 3 

STM. 

tt 

— 

15 

DL. 2 

STM. 

tt 

— 

37 


TRA 



DL. 3 

STM. 

ft 

— 

16 

-DL. 2 

STM. 

ti 

— 

38 


END 



DL. 3 

STM. 

n 

— 

17 







h 11 n t? n 11 ii n i» ir Tf ii n it it n ii ii ii if n it ii ii ii ii it »i it »i (i ti it ii w »» »i ii »i « it tt »i n n if n »i ii it ii ii ii it ii ii »♦ n it it it n ti ti it 
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RESULTS FOR PROGRAM MEAN/MIN/MAX 


N 

- 

16.000 

X 


23.900 

X 

— 

156.900 

X 


23.800 

X 


34.900 

X 

— 

34.000 

X 


56.000 

X 

— 

16739.000 

X 

— 

123.457 

X 

= 

12345.678 

X 

— 

345.545 

X 

== 

43.560 

X 


98.340 

X 


76.430 

X 

— 

54.230 

X 

zr 

21.565 

X 

— 

565.323 


MEAN = 

1920.161 

MIN = 

21.565 

MAX = 

16739.000 


** STOP ** 384 DL.2 STATEMENTS EXECUTED. 


ntniffii«innnnai!TiiiiiTifnitinittMtii 


End of example 


iv rf tv ti n fi tt n ft ti tv ci fi fi n n n «i ft tv tv fi n tf n 


Notes: 

To the user interested solely in DL.3, the page before last may 
seem useless. This is largely true in that case, and all that is 
useful to the DL.3 programmer is the two columns of figures down 
the right hand side. These latter are useful as the execution of 
a program is unconnected with the compilation of it, and therefore 
the DL.3 statement numbers are not known at execution time. This 
means that all information given to the programmer during 
execution will be in terms of DL.2 (Low level language) 
statements. For instance, in the example above, the total number 

of statements executed is given in terms of DL.2 statements. (384) 
If an error occurs during execution, an appropriate error message 
will be printed, together with further items of information. These 
latter are: 
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a) The contents of the accumulator when the error occured. 

b) The number of the D L.2 statement that was being executed 
when the error occured. The number of the corresponding DL.3 

statement can then be found by refering to the columns of 
figures remarked upon earlier. 

c) The number of lines of remits printed. 

d) A store dump. That is, the contents of all stores used in the 
program. (Including the compiler generated temporaries.) 

The short dashed lines on the fifth 'page' of sample output show 

the beginning of each DL.3 statement. 



Appendix E. 


Reserved keywords. 


Page ho. 


Certain combinations of letters that may not be used as 
variable names or labels are listed below. The symbol a means 
that characters present here will not affect the reserved status 

of the name or label, e.g. IPS may not be used as a variable name 
or label. 


CALL 


ENDS 


GOTO 

IFID5) 

PARM 

READ 

STOP 


SETS) 

THEN 


These are, of course, the keywords that identify each type of 
DL.3 statement. 



Index 
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Arithmetic operators - 8 
Assignment statement - 10 
Blank lines, printing of - 18 
Blanks, use of - 4 
Brackets, use of - 9 
CALL statement - 20 

Characters, valid - 3 
CODE parm item - 32 
colons, use of - 7 

Comments - 4 

Compilation definition - 3 

Compiler (DL.3 'A') output - 30,34,35,36,37,38,39 

Constants: in data - 16 

in expressions - 5 
in SET statements - 21 

Continuations - 4 

Control statements - 11,12,13,14 

CROSS parm item - 33 

Cross-reference lists - 30.32,36 

Data - 16 

Definition of DL.3 - 3,23,24,25,26 
DL.2 - 38 

DL.3 - See definition of DL.3 

END statement - 3,14 

Error messages - 31 
EXEC parm item - 22 
Executable statements - 15 
Expressions - 8,9 

Formal definition of DL.3 - 23,24,25,26 



Page 

goto statement - 
IF statement - 12,15 
Input - 16,17 
Labels ~ 6,7 

Lengths of statements e.t.c. - 26 

Logical expressions - 12 

Logical operators - 12 

Names of variables - 6 

NEWPAGE parm item - 22 

NOCODE parm item - 32 

NOCROSS parm item - 32 

NOMESSAGES parm item - 32 

NOMSG parm item - 31 

Non-executable statements - 15 

NOSEV parm item - 32 

NOXREF parm item - 32 

operators: Arithmetic - 8 

Logical - 12 

Output - 1.6,18 

OUTPUT parm item - 22 

Parentheses, use of - 9 

PARM statement - 22,30,31,32,33 

Priority of arithmetic operators - 8,9 

PROGRAM statement - 3,13 

Program name - 13 

read statement - 17 

Reserved keywords - 40 
RETURN statement - 19 

Sample compiler output - 34,35,36,37,38,39 
Sample programs - 27,28,29,35 
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SET statement - 21 
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SEV parm item - 32 
Severity codes — 31 
Source program - 3 

STOP statement - 13 
Subprograms - 19,20 
Symbolic identifiers - 6,7 
THEN - 12 

Valid characters - 3 
Variable names - 6 
Variables - 6 
WRITE statement - 18 
XREF parm item - 32 



